All Peak Analysis (not removing peaks in TSS)
library(tidyverse)[30m── [1mAttaching packages[22m ──────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────── tidyverse 1.2.1 ──[39m
[30m[32m✔[30m [34mggplot2[30m 3.1.0 [32m✔[30m [34mpurrr [30m 0.2.5
[32m✔[30m [34mtibble [30m 1.4.2 [32m✔[30m [34mdplyr [30m 0.7.8
[32m✔[30m [34mtidyr [30m 0.8.2 [32m✔[30m [34mstringr[30m 1.3.1
[32m✔[30m [34mreadr [30m 1.1.1 [32m✔[30m [34mforcats[30m 0.3.0[39m
[30m── [1mConflicts[22m ─────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────────── tidyverse_conflicts() ──
[31m✖[30m [34mdplyr[30m::[32mfilter()[30m masks [34mstats[30m::filter()
[31m✖[30m [34mdplyr[30m::[32mlag()[30m masks [34mstats[30m::lag()[39mpeak <- read_tsv('/Volumes/data/projects/nei/hufnagel/iPSC_RPE_ATAC_Seq/peak_full/homer_all/all_common_peaks.blackListed.narrowPeak.closestTSS__interesting_homer_motif.bed.gz', col_names = F)Parsed with column specification:
cols(
X1 = col_character(),
X2 = col_integer(),
X3 = col_integer(),
X4 = col_character(),
X5 = col_integer(),
X6 = col_character(),
X7 = col_integer(),
X8 = col_integer(),
X9 = col_character(),
X10 = col_integer(),
X11 = col_character(),
X12 = col_character(),
X13 = col_character(),
X14 = col_integer(),
X15 = col_integer(),
X16 = col_character(),
X17 = col_double(),
X18 = col_character()
)